home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Shareware Overload Trio 2
/
Shareware Overload Trio Volume 2 (Chestnut CD-ROM).ISO
/
dir34
/
katlog.zip
/
KATBOOK2.BAT
< prev
next >
Wrap
DOS Batch File
|
1994-07-02
|
3KB
|
98 lines
echo off
rem DBS-KAT (C) COPYRIGHT 1986, R.H. MARTIN. By APPLIED FORESIGHT, INC.
if I == %1 goto domenu
if exist %1.out del %1.out
if not exist %1.oqt echo Missing file, %1, please fix & rerun...
if not exist %1.oqt goto end
:domenu
echo :
echo : Please indicate the number corresponding to the letters of your
echo : hard disk drive and to the floppy drive with the DBS-KAT diskette
echo : in the drive. If you don't have a hard disk drive, but you
echo : do have a high capacity floppy drive (1.2 MB space), you can use
echo : this drive as your hard disk instead. The manuals & programs were
echo : decompressed to fit on the diskette. If you're printing, the
echo : expanded manual will be placed on your hard disk & then printed
echo : (afterwards, it will be deleted). If you're installing the
echo : programs, they'll be left on your hard disk.
echo :
echo : 1. Hard disk is D: and the floppy drive with DBS-KAT is A:.
echo : 2. Hard disk is C: and the floppy drive with DBS-KAT is A:.
echo : 3. Hard disk is A: and the floppy drive with DBS-KAT is B:.
echo : 4. None of the above.
katask 2
echo :
if not errorlevel 1 goto bad_hit
if errorlevel 4 goto bad_hit
if I == %1 goto progs
echo : About to decompress DBS-KAT manual...
if errorlevel 3 goto proc3
if errorlevel 2 goto proc2
if errorlevel 1 goto proc1
:proc1
d:
a:usq a:%1.oqt
a:
echo :
echo : Printing the DBS-KAT manuals...
type d:%1.out > prn
del d:%1.out
goto end
:proc2
c:
a:usq a:%1.oqt
a:
echo :
echo : Printing the DBS-KAT manuals...
type c:%1.out > prn
del c:%1.out
goto end
:proc3
a:
b:usq b:%1.oqt
b:
echo :
echo : Printing the DBS-KAT manuals...
type a:%1.out > prn
del a:%1.out
goto end
:progs
echo : About to decompress & install DBS-KAT programs...
if errorlevel 3 goto prog3
if errorlevel 2 goto prog2
if errorlevel 1 goto prog1
:prog1
d:
a:usq a:kat.eqe
a:usq a:katlook.eqe
a:usq a:katscan.eqe
a:usq a:kprint.eqe
a:usq a:katorder.fqm
a:usq a:katbug.fqm
a:
goto end
:prog2
c:
a:usq a:kat.eqe
a:usq a:katlook.eqe
a:usq a:katscan.eqe
a:usq a:kprint.eqe
a:usq a:katorder.fqm
a:usq a:katbug.fqm
a:
goto end
:prog3
a:
b:usq a:kat.eqe
b:usq a:katlook.eqe
b:usq a:katscan.eqe
b:usq a:kprint.eqe
b:usq a:katorder.fqm
b:usq a:katbug.fqm
b:
goto end
:bad_hit
echo You did not choose a correct number; rerun this procedure again
:end